home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / C64 / A-Monthly Disks / (c)abk.d64 / disk spinner (.txt) < prev    next >
Commodore BASIC  |  2007-02-04  |  239b  |  11 lines
  1. 10 PRINT"[147]THE DISK SPINNER
  2. 15 [153]"PRINT 2 LINES ACROSS THEN
  3. 20 PRINT"HIT SPC BAR TO QUIT
  4. 30 [159]15,8,15:[159]2,8,2,"#"
  5. 35 [152]15,"M-W"[199](106)[199](0)[199](1)[199](133)
  6. 40 [152]15,"U1:"2;0;Y;0
  7. 50 [161]A$:[139]A$[178][199](32)[167]80
  8. 60 [153]"X";:Y[178]Y[170]1:[139]Y[177]35[167]Y[178]1
  9. 70 [137]40
  10. 80 [160]1:[160]15:[128]
  11.